home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1994 #2 / Monster Media No. 2 (Monster Media)(1994).ISO / prog_gen / xv_pc16a.zip / EXTKEYS.INC < prev    next >
Text File  |  1994-04-20  |  2KB  |  42 lines
  1. {$IFNDEF EXTKEYS}
  2. {$DEFINE EXTKEYS}
  3. {
  4. Keyboard event codes in the Xview-PC interface
  5. By Antonio Carlos Moreirao de Queiroz - acmq@coe.ufrj.br
  6. Version 1.0 - 10/04/94
  7.  
  8. This file can be included in programs that use keyboard events.
  9. Normal keys generate the ASCII code. Other keys generate 2000+2nd code.
  10. }
  11.  
  12. CONST
  13.   kCtrlA=1; kCtrlB=2; kCtrlC=3; kCtrlD=4; kCtrlE=5; kCtrlF=6;
  14.   kCtrlG=7; kCtrlH=8; kCtrlI=9; kCtrlJ=10; kCtrlK=11; kCtrlL=12;
  15.   kCtrlM=13; kCtrlN=14; kCtrlO=15; kCtrlP=16; kCtrlQ=17; kCtrlR=18;
  16.   kCtrlS=19; kCtrlT=20; kCtrlU=21; kCtrlV=22; kCtrlW=23; kCtrlX=24;
  17.   kCtrlY=25; kCtrlZ=26;
  18.   kCr=13; kTab=9; kBs=8;
  19.   kNul=2003; {Ctrl-@}
  20.   kShiftTab=2015;
  21.   kAltQ=2016; kAltW=2017; kAltE=2018; kAltR=2019; kAltT=2020;
  22.   kAltY=2021; kAltU=2022; kAltI=2023; kAltO=2024; kAltP=2025;
  23.   kAltA=2030; kAltS=2031; kAltD=2032; kAltF=2033; kAltG=2034;
  24.   kAltH=2035; kAltJ=2036; kAltK=2037; kAltL=2038;
  25.   kAltZ=2044; kAltX=2045; kAltC=2046; kAltV=2047; kAltB=2048;
  26.   kAltN=2049; kAltM=2050;
  27.   kF1=2059; kF2=2060; kF3=2061; kF4=2062; kF5=2063;
  28.   kF6=2064; kF7=2065; kF8=2066; kF9=2067; kF10=2068;
  29.   kHome=2071; kUpArrow=2072; kPgUp=2073;
  30.   kLeftArrow=2075;
  31.   kRightArrow=2077;
  32.   kEnd=2079; kDownArrow=2080; kPgDn=2081; kIns=2082; kDel=2083;
  33.   kShiftF1=2084; {...} kShiftF10=2093;
  34.   kCtrlF1=2094;  {...} kCtrlF10=2103;
  35.   kAltF1=2104;   {...} kAltF10=2113;
  36.   kCtrlPrtsc=2114; kCtrlLeftArrow=2115; kCtrlRightArrow=2116; kCtrlEnd=2117;
  37.   kCtrlPgDn=2118; kCtrlHome=2119;
  38.   kAlt1=2120; kAlt2=2121; kAlt3=2122; kAlt4=2123; kAlt5=2124;
  39.   kAlt6=2125; kAlt7=2126; kAlt8=2127; kAlt9=2128; kAlt0=2129;
  40.   kAltMinus=2130; kAltEqual=2131; kCtrlPgUp=2132;
  41.  
  42. {$ENDIF}